gusucode.com > MSComm 控件的 Modem 通讯C#源码程序 > MSComm 控件的 Modem 通讯/modem_demo/modem_demo/modem_demoDlg.cpp

    // modem_demoDlg.cpp : implementation file
//

#include "stdafx.h"
#include "modem_demo.h"
#include "modem_demoDlg.h"

#ifdef _DEBUG
#define new DEBUG_NEW
#undef THIS_FILE
static char THIS_FILE[] = __FILE__;
#endif

/////////////////////////////////////////////////////////////////////////////
// CAboutDlg dialog used for App About

class CAboutDlg : public CDialog
{
public:
	CAboutDlg();

// Dialog Data
	//{{AFX_DATA(CAboutDlg)
	enum { IDD = IDD_ABOUTBOX };
	//}}AFX_DATA

	// ClassWizard generated virtual function overrides
	//{{AFX_VIRTUAL(CAboutDlg)
	protected:
	virtual void DoDataExchange(CDataExchange* pDX);    // DDX/DDV support
	//}}AFX_VIRTUAL

// Implementation
protected:
	//{{AFX_MSG(CAboutDlg)
	//}}AFX_MSG
	DECLARE_MESSAGE_MAP()
};

CAboutDlg::CAboutDlg() : CDialog(CAboutDlg::IDD)
{
	//{{AFX_DATA_INIT(CAboutDlg)
	//}}AFX_DATA_INIT
}

void CAboutDlg::DoDataExchange(CDataExchange* pDX)
{
	CDialog::DoDataExchange(pDX);
	//{{AFX_DATA_MAP(CAboutDlg)
	//}}AFX_DATA_MAP
}

BEGIN_MESSAGE_MAP(CAboutDlg, CDialog)
	//{{AFX_MSG_MAP(CAboutDlg)
		// No message handlers
	//}}AFX_MSG_MAP
END_MESSAGE_MAP()

/////////////////////////////////////////////////////////////////////////////
// CModem_demoDlg dialog

CModem_demoDlg::CModem_demoDlg(CWnd* pParent /*=NULL*/)
	: CDialog(CModem_demoDlg::IDD, pParent)
{
	//{{AFX_DATA_INIT(CModem_demoDlg)
	m_PhoneNumber = _T("");
	m_ReceiveData = _T("");
	m_SendData = _T("");
	//}}AFX_DATA_INIT
	// Note that LoadIcon does not require a subsequent DestroyIcon in Win32
	m_hIcon = AfxGetApp()->LoadIcon(IDR_MAINFRAME);
}

void CModem_demoDlg::DoDataExchange(CDataExchange* pDX)
{
	CDialog::DoDataExchange(pDX);
	//{{AFX_DATA_MAP(CModem_demoDlg)
	DDX_Control(pDX, IDC_BUTTON_SENDDATA, m_Send);
	DDX_Control(pDX, IDC_BUTTON_HANGUP, m_HangUp);
	DDX_Control(pDX, IDC_BUTTON_DIAL, m_Dial);
	DDX_Control(pDX, IDC_BUTTON_CLEAR, m_Clear);
	DDX_Text(pDX, IDC_EDIT_NUMBER, m_PhoneNumber);
	DDX_Text(pDX, IDC_EDIT_RCVDATA, m_ReceiveData);
	DDX_Text(pDX, IDC_EDIT_SENDDATA, m_SendData);
	DDX_Control(pDX, IDC_MSCOMM, m_comm);
	//}}AFX_DATA_MAP
}

BEGIN_MESSAGE_MAP(CModem_demoDlg, CDialog)
	//{{AFX_MSG_MAP(CModem_demoDlg)
	ON_WM_SYSCOMMAND()
	ON_WM_PAINT()
	ON_WM_QUERYDRAGICON()
	ON_BN_CLICKED(IDC_BUTTON_DIAL, OnDial)
	ON_BN_CLICKED(IDC_BUTTON_HANGUP, OnHangup)
	ON_BN_CLICKED(IDC_BUTTON_SENDDATA, OnSenddata)
	ON_BN_CLICKED(IDC_BUTTON_CLEAR, OnClear)
	ON_WM_TIMER()
	//}}AFX_MSG_MAP
END_MESSAGE_MAP()

BEGIN_EVENTSINK_MAP(CModem_demoDlg, CDialog)
    //{{AFX_EVENTSINK_MAP(CModem_demoDlg)
	ON_EVENT(CModem_demoDlg, IDC_MSCOMM, 1 /* OnComm */, OnComm, VTS_NONE)
	//}}AFX_EVENTSINK_MAP
END_EVENTSINK_MAP()

/////////////////////////////////////////////////////////////////////////////
// CModem_demoDlg message handlers

BOOL CModem_demoDlg::OnInitDialog()
{
	CDialog::OnInitDialog();

	// Add "About..." menu item to system menu.

	// IDM_ABOUTBOX must be in the system command range.
	ASSERT((IDM_ABOUTBOX & 0xFFF0) == IDM_ABOUTBOX);
	ASSERT(IDM_ABOUTBOX < 0xF000);

	CMenu* pSysMenu = GetSystemMenu(FALSE);
	if (pSysMenu != NULL)
	{
		CString strAboutMenu;
		strAboutMenu.LoadString(IDS_ABOUTBOX);
		if (!strAboutMenu.IsEmpty())
		{
			pSysMenu->AppendMenu(MF_SEPARATOR);
			pSysMenu->AppendMenu(MF_STRING, IDM_ABOUTBOX, strAboutMenu);
		}
	}

	// Set the icon for this dialog.  The framework does this automatically
	//  when the application's main window is not a dialog
	SetIcon(m_hIcon, TRUE);			// Set big icon
	SetIcon(m_hIcon, FALSE);		// Set small icon
	
	// TODO: Add extra initialization here
   if(m_comm.GetPortOpen())
   {
      m_comm.SetPortOpen(FALSE);//设置串口配置信息前先要关闭串口
   }                   
    m_comm.SetCommPort(1);//Com1串行口       
	m_comm.SetSettings("9600,n,8,1");//设置波特率为9600bps,无奇偶校验位,数据位8位,停止位1位
	m_comm.SetInputMode(1);//设置数据通讯格式为二进制数组格式
	m_comm.SetRThreshold(1);//设置为每次接到一个字节数据就触发OnComm事件
	if(!m_comm.GetPortOpen())  
	{
		m_comm.SetPortOpen(TRUE);
	}	
    m_comm.GetInput();//清除串口输入缓冲区中残留数据
	m_SendData="ATZ\r\n";//调制解调器初始化
    m_comm.SetOutput(COleVariant(m_SendData));

	m_ConnectOk=FALSE;
	GetDlgItem(IDC_BUTTON_DIAL)->EnableWindow(FALSE);
	GetDlgItem(IDC_BUTTON_SENDDATA)->EnableWindow(FALSE);
	GetDlgItem(IDC_BUTTON_HANGUP)->EnableWindow(FALSE);
	SetTimer(1,3000,NULL);

	return TRUE;  // return TRUE  unless you set the focus to a control
}

void CModem_demoDlg::OnSysCommand(UINT nID, LPARAM lParam)
{
	if ((nID & 0xFFF0) == IDM_ABOUTBOX)
	{
		CAboutDlg dlgAbout;
		dlgAbout.DoModal();
	}
	else
	{
		CDialog::OnSysCommand(nID, lParam);
	}
}

// If you add a minimize button to your dialog, you will need the code below
//  to draw the icon.  For MFC applications using the document/view model,
//  this is automatically done for you by the framework.

void CModem_demoDlg::OnPaint() 
{
	if (IsIconic())
	{
		CPaintDC dc(this); // device context for painting

		SendMessage(WM_ICONERASEBKGND, (WPARAM) dc.GetSafeHdc(), 0);

		// Center icon in client rectangle
		int cxIcon = GetSystemMetrics(SM_CXICON);
		int cyIcon = GetSystemMetrics(SM_CYICON);
		CRect rect;
		GetClientRect(&rect);
		int x = (rect.Width() - cxIcon + 1) / 2;
		int y = (rect.Height() - cyIcon + 1) / 2;

		// Draw the icon
		dc.DrawIcon(x, y, m_hIcon);
	}
	else
	{
		CDialog::OnPaint();
	}
}

// The system calls this to obtain the cursor to display while the user drags
//  the minimized window.
HCURSOR CModem_demoDlg::OnQueryDragIcon()
{
	return (HCURSOR) m_hIcon;
}

void CModem_demoDlg::OnDial() 
{
	// TODO: Add your control notification handler code here
	stop=!stop;
	if(!stop)
	 {
       m_Dial.SetWindowText("停止拨号");
	   m_SendData="ATDT"+m_PhoneNumber+"\r\n";       //拨号
	   m_comm.SetOutput(COleVariant(m_SendData));
	   m_Dial.SetWindowText("停止拨号");
	   SetTimer(2,40000,NULL);
	 }
    else
     {
	  m_SendData="ATH0\r\n";                    //挂机 
	  m_comm.SetOutput(COleVariant(m_SendData));
	  m_Dial.SetWindowText("重新拨号");
	}
}

void CModem_demoDlg::OnHangup() 
{
	// TODO: Add your control notification handler code here
      m_SendData="+++";                         //挂机 
	  m_comm.SetOutput(COleVariant(m_SendData));
	  Sleep(3000);
	  m_SendData="ATH0\r\n";                    //挂机 
	  m_comm.SetOutput(COleVariant(m_SendData));
	  m_Dial.EnableWindow(true);
      open=true;
	  m_ConnectOk=false;
	  m_Dial.SetWindowText("重新拨号");
}

void CModem_demoDlg::OnSenddata() 
{
	// TODO: Add your control notification handler code here
    if(!m_ConnectOk)
	{
	 MessageBox("请先拨号,建立连接!","消息",MB_ICONINFORMATION);
	}
	else
	{
	UpdateData(FALSE);
	m_comm.SetOutput(COleVariant(m_SendData));
	}
}

void CModem_demoDlg::OnClear() 
{
	// TODO: Add your control notification handler code here
	UpdateData(TRUE);
	if(!(m_SendData.GetLength()||m_ReceiveData.GetLength()))
	{
        MessageBox("数据区为空!","消息",MB_ICONINFORMATION);
	    return;
	}
	m_SendData.Empty();
	m_ReceiveData.Empty();
	UpdateData(FALSE);
}


void CModem_demoDlg::OnComm() 
{
	// TODO: Add your control notification handler code here
	Sleep(500);                              //确保接收数据的完整性(500ms)
    VARIANT m_input;
    char *str,*str1;
    int k,nEvent,i,len,m;
    CString str2;
    m_ReceiveData="";
    nEvent=m_comm.GetCommEvent();
	switch(nEvent)
	{
	case 2:
	   k=m_comm.GetInBufferCount();     //接收缓冲区的字符数目
	   if(k>0)
	   {
		   m_input=m_comm.GetInput();
		   str=(char*)(unsigned char*)m_input.parray->pvData;
	   }
	   i=0;
	   str1=str;
	   while(i<k)
	   {
		   i++;
		   str1++;
	   }
	   *str1='\0';                               
       str2=(const char*)str;             //清除字符串中的不必要字符
       m_ReceiveData=(const char *)str;
	   len=str2.GetLength();

       for(m=0;m<len;m++)
	   {
	   //if(isalnum(str2[m]))              //字母或数字 
	   if(isprint(str2[m]))                //可打印字符,不包括空格
	   //if(!ispunct(str2[m]))
	   m_ReceiveData+=str2[m];
	   }

      if(strcmp(m_ReceiveData,"CONNECT 2400")==0)
	  {
		 MessageBox("连接成功,可以发送数据!","消息",MB_ICONINFORMATION);
		 m_ConnectOk=TRUE;
		 GetDlgItem(IDC_BUTTON_DIAL)->EnableWindow(FALSE);
         GetDlgItem(IDC_BUTTON_SENDDATA)->EnableWindow(TRUE);
	     GetDlgItem(IDC_BUTTON_HANGUP)->EnableWindow(TRUE);
	  }
      else if(strcmp(m_ReceiveData,"OK")==0)
	  {
	    if(!m_ConnectOk)            
		 {
         KillTimer(1);
		 MessageBox("调制解调器初始化成功!","消息",MB_ICONINFORMATION);
		 GetDlgItem(IDC_BUTTON_DIAL)->EnableWindow(TRUE);
         return;		 
		}
		else
		{
		 m_SendData="ATH0\r\n"; //挂机
      	 m_comm.SetOutput(COleVariant(m_SendData));
		 open=true;
         m_Dial.SetWindowText("重新拨号");
		 m_Dial.EnableWindow(true);
	     m_ConnectOk=FALSE;
         MessageBox("连接超时,请检查网络!","消息",MB_ICONINFORMATION);
		 return;
		}
	  }
	  else if(strcmp(m_ReceiveData,"BUSY")==0)
	  {
	    MessageBox("线路忙,请稍候再拨!","消息",MB_ICONINFORMATION);
        m_Dial.EnableWindow(true);
	    open=true;
	    m_Dial.SetWindowText("重新拨号");
	    return;
	  }
	  else if(strcmp(m_ReceiveData,"NO DIALTONE")==0)
	  {
	   MessageBox("无拨号音或未连接电\n话线,请检查设备!","消息",MB_ICONINFORMATION);
       m_Dial.EnableWindow(true);
	   open=true;
	   m_Dial.SetWindowText("重新拨号");
	   return;
	  }
	  else if(strcmp(m_ReceiveData,"NO CARRIER")==0)
	  {
        MessageBox("对方无响应,请检查\n后重新连接!","消息",MB_ICONINFORMATION);
	    m_Dial.EnableWindow(true);
        open=true;
		m_ConnectOk=FALSE;
        m_Dial.SetWindowText("重新拨号");
		return;
	  }
	  else if(strcmp(m_ReceiveData,"ERROR")==0)         //ATZ指令不兼容
	  {
       m_SendData="AT&FE0\r";  
       m_comm.SetOutput(COleVariant(m_SendData));
       return;
	  }
	   UpdateData(FALSE);
       break;
   case 3:       //CTS线状态发生变化
	   break;
   case 4:       //DSR线状态发生变化
	   break;
   case 5:       //CD线状态发生变化
	   break;
   case 6:       //Ring Indicator发生变化
	   break;
}	
}


void CModem_demoDlg::OnTimer(UINT nIDEvent) 
{
	// TODO: Add your message handler code here and/or call default
		switch(nIDEvent)
	{
	case 1:
		KillTimer(1);
		MessageBox("没找到设备,请检查调制解调器\n通讯电缆是否与COM1口连接或\n电源是否打开!","消息",MB_ICONINFORMATION);
		exit(0);
		break; 
	case 2:
		KillTimer(2);
		MessageBox("线路故障,请复位调制解调器电\n源并重新连接!","消息",MB_ICONINFORMATION);
        open=true;
        m_Dial.SetWindowText("重新拨号");
		m_Dial.EnableWindow(true);
	   	}
	CDialog::OnTimer(nIDEvent);
}

void CModem_demoDlg::OnOK() 
{
	// TODO: Add extra validation here
	int nAnswer;
	if(m_ConnectOk)
	{
	  nAnswer=MessageBox("设备处于连接状态,确认\n要断开吗?","退出",MB_YESNO|MB_ICONQUESTION);
	  switch(nAnswer)
	  {
	  case IDYES:
      m_SendData="+++";                         //挂机 
	  m_comm.SetOutput(COleVariant(m_SendData));
	  //m_hangup=TRUE;
	  Sleep(2000);
	  m_SendData="ATH0\r\n";                    //挂机 
	  m_comm.SetOutput(COleVariant(m_SendData));
	  break;
	  case IDNO: return;break;
	   }
	 }
	if(m_comm.GetPortOpen())
	m_comm.SetPortOpen(false);
	CDialog::OnOK();
	OnClose();
}